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HYTSE 


NYTSE MEETS ON HOND&Y THE WEE. 
HETER THE LIST MEETING AT; 
MISS KIMS БЕЗ Seen 


COMING EVENTS: 

HEEEEEE EEE +#+++ +++ + +++ ج چ ج‎ ES ES 
OCT. 11, 1992 LIST MEETING. 
OCT. 19, 1992 NYTSE MEETING 


MEETING MINUTES 
REPORTED EY: 
FRED AND MICHAEL STERN 


12. Lose 
Seer نه نخ‎ + + FERRE SESE + نچ نخ نچ‎ + +++ ++ 
EY CALLED THE MEETING TO 


HR 
ORDER AT 2: 20FH, r 


WE RECEIVED A HUMBER OF LETTERS 
CURING THE SUNNER. THEY INCLUDED 
1 MEMBERSHIP FEHEVAL AND 3 
REQUESTS FOR FUBLICATIONS. 


BOB MALLOY REPOR TED „THAT WE HAVE 


HARVEY PRESENTED а MOTION THAT 
THE LISTING EDITOR (FRED STERN) 
AND THE LIST LIBRARIAN (TOM 
EBRAPINSK I) RECEIVE ONE YEARS 


FREE MEMBERSHIP FOR š 
HOURS OF TIME AND LABOR THEY FUT 
INTO OUR GROUP. THE MOTION WAS 

APPROVED By ÜNANIMOUS ROTE. 


FRED PRESENTED AHOTHER MOTION, 
SEIL WEES STER, BH FELLO 
= {ЧГ IEND OF LIS 

TED SOFTURBE , 

= MEWSLETTERS 
4 БАЕ THIS MATERIAL 

WAS SENT EY ROBERT To BE MADE 
AVAILABLE TO FEGFLE WHO COULO 
USE THIS VALUABLE. HARD TO FIND 
EE nis 
FRED EEGUEZTED THAT ЕСЕ HIS 
GEHEROGUSITY,., HR. WEBSTER ALSO 
RECEIVE A ONE YEARS FREE HEHBER- 
SHIP IH LIST. THIS MOTION WAS 
ALZO APPROVED БҮ UNANIMOUS UOTE. 


FEED FINALLY REPOETED ON LISTING 

= WE HEED & GL REPORTER 
REGUESTED IM THE LAST = 
DES OF LISTING. UE ALSO HEED 
ЕН NEW gL ARTIC LES. UP -COMHING 
WES OF LISTING WILL HAVE 


TI 
- 
4m 
mm 
п 

D 


inn 
i 
T 
X) 


GILDER M 
T FUTURE 


A RECOMMENDATION 
T MEETINGS SHOULD 
CEMNONSTRAT IDH 

; ION WAS AGREED 
ON EY ALL ATTE is HEMBERS. 
FRED WILL ARRANGE A T31000 DENG 
FOR THE OCTOBER HEETING. 


BOE GILDER GENMONSTRATED THE 
GOLD CARD FROM MIRACLE WITH THE 
ED DISK DRIVES., (SEE GL CORNER 
PAGE 5), THE SPEED GF OPEFAT ION 
WAS EXTREMELY IHPEESIUE. THE 
OPERATING SYSTEM ALLUS TO HAVE 
TRUE SUE DIRECTORIES. 


EHSSET BOGK STORE RECENTLY 
OPENED IN-SAYUILLE. L.I.. DIR- 
ING THE GRAND OPENING, FRED WENT 
THEIR AND INQUIRE IF THEY HAG 
ТІМЕХ SINCLAIR C OHMPUTER BOOKS. 
ШЕ, WAS ADVISED THAT THEY HRUE 

COPY EACH OF 7 EDGES ABOUT THE 
(|, ALL WERE SOLD ON OPENING 
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PORT ON THE LIMARC HRMFEST AND 
ELEC TRONICS FLEAMARKET WILL BE 
Iti HEXT ISSUE. 


A FINAL WORD 

MY NAME IS FRED STERN AND I AM 
THE EDITOR GF THIS EDITION OF 
LISTING, 

I HOFE YOU ALL HAD A NICE SUMMER 
LISTING HAS A FEL GREAT THINGS 
PLANNED FOR UP-COMING ISSUES. 

I ОНОРЕ YOU ENJOY THEM. 


THIS ISSUE REPRINTS SOME GREAT 


FA: FROM THE FOLLOLHING 
MEL 

FRI E 

TIHE: £ 

T T: 

MAR TiS The b. 

1334 THIS H 

TAUGHT US HO TO 

THE HEWESLETTERS 

PROGRAMS WE WANTED. 

I2 MACE 30 THAT -THIS 

HOT FORGOTTEN. = 

МЕШ TO THE TIMEX COMMUNITY TAN 
LEREH AND BENEFIT FROM IT. 

SPEC » TO: MICHAEL STERN 
TOF ЕСЕ GILDER, 

ROE 7 i FOR THE COPIES 
GF WELETTERS). 

SEE YOU ALL AT THE NEXT MEETING. 


LL L. 


QL CORNER 


MIRACLE Systems Ltd., has announced that they аге no longer 
manufacturing their popular and long standing memory expansion 
units, the Expanderam and Trump Card. They have licensed 
Production and suppport of the above mentioned interfaces to Ron 
Dunnett of Qubbesoft, 38 Brunwin Road, Rayne, Braintres, Essex 
CM7 SBU, UK. Telephone 0376 47852. Contact them for price. 


I have just received my second Gold Card from Miracle at the cost 
of £200 - $376.00 US, post paid. Needless to say, once you use 
the Gold Card and then switch back to the Trump Card you realize 
Just how much faster the Gold Card operation is as compared to 
the older interfaces. 


I made another purchase of an ED disk drive, $95.00. Not only is 
disk access time faster than the 5 1/4" drives and 3.5" 720K 
drives but has the advantage of accessing both reading and 
writing to all 3..5" 720K, 1.4M and 3.2M disks. I will be 
demonstrating this set up at the September LIST meeting. 


It is hard to believe that the QL is still being supported after 
So many years since its manufacturing has ceased. Throughout the 
world new Software and hardware is being produced. All vou have 
to do is to thumb through the pages of QL World and The 
International QL Report publications .... every issue contains 
more-and-more advertisers than the previous issues. 


Perhaps next month I will outline the products available 
throughout both publications. 


Bob Gilder 


From CATS. 
А 12-84 
T/S 2068 Keyboard Scanning 


Kost programs require user interaction through the keyboard,and use 
the INPUT or INKEY$ functions to do this job. This article will dis- 
Some alternative:ways to input through the keyboard. 


Method #1: Hardware generated interrupts are used in the 2068 to up- 
date the TV frames counter and to scan the keyboard for pressed keys. 

If à pressed key is found, the character code associated with it is 
determined. and stored in system variable LAST-K.If you POKE a zero in 
23560,and then immediately PERK the same location, the PEEK will return 
the code for a key pressed between the POKZ and PEEK, provided that a + 
Scan has occurred in this time interval. ?o insure a.scan, place a USR 
137 after the РОК. This method is roughly like an INKEY$ function which 
returns a code rether than a string variable. 

Method #2:If you are willing to use a small amount of machine code, you 
can directly call the ROM routine which examines the keyboard. This is 
K-Scan, located at 688d. (In the Spectrum, this same routine is at O28E 
(hex) . то use K-Scan, you need to know the position code system used in 
the T/S, and you need to be able to get.at the D and E registers, which 
is where the position codes are located when a return is made from K-Scan 
to the calling routine. If no key is pressed, D end E hold 255; опе key 
results in 255 in D and the position code in E; two keys results in pos- 
ition codes in both D and E. The position code is a value from О to 39, 
calculated as follows : (47-row #)-(8*column й). Here, а "row" means 5%. 
keys іп a.half-rov, such as A S D F G, Rows are numbered 1 to 8, starting 
with the lower left row and going upana tea down . A "column" consists 
of 8 keys, such as column 2: Z S М 2 9 О L Break/Space.There are 5 col- 
umns, numbered 1 thru 5, starting with the outer keys.(Note that there 
are two redundant keys which are ignored; these are the space-bar and 
the right side cap shift; these are keys added by Timex which perform 

no new function but make the keyboard a bit more like a typewriter),iin- 
like method #1 or INKEY$, method#2 allows you to handle two 4 |: ` „keys 
pressed at the same time... . [> MD 2% 


Method #3: This method uses the IN function. For example, the BASIC 
Statement LET A = IN 65278 will scan the lst row (bottomileft, 5 keys) 
and assign to A a value of 31 if no keys are pressed. (Note: Some 
published programs using IN are for the Spectrom version 2, whose base 
value is 255, not 31.) If the keys are pressed the value returned is 
the base value (21) minus the column value of any key pressed. Column 
values are 1, 2, 4, 8, and 16 for-columns 1, 2, 2, 4, and 5 respectively. 
The number following IN must meet certain cr teria. When expressed as a 
two byte binary number, the least significant ("low") byte must be the 
ort nunber of the keyboard (i.e. 254 decimal). “he most significant 
Umign") byte must havc a "O" in the bit position corresponding to the 
row to be scanned. In the above example, 65278 in binary has as its 
high byte 11111110; since the zero is in the lst bit position, the lst 
row will be active when this statement is executed. Rather than get 
involved in decimal-binary conversions, you can also use a statement 
like: LET A = IN (256*BIN 11111110 + 254) to do the same thing. Hote 
too, that you can put a zero in any position, or in any number of posi- 
tions, in the binary number and Simultaneously scan any combination of 
of rows with a single statement. (fut, if you scan two rows at once, 
you cannot tell which row of the two a pressed key із. іп.) The EASIC 
ecuivalent of K-ÙULAN can be produced, of course, using eight IN state- 
ments. But unlike K-SCAN, you can detect tho pressing of more than two 


keys, 
== PL Pu 7 


The Moving Pixel Writes --- From CATS 
from: Brice Nickel 6-94 


| Would you like to become a Picasso of the 
display file? Try this high-resolution plotting 
routine that has both а pixel cursor and an erase 
feature. (It is a much modifies version of Tim 
Hartnell's program in Т5 2068 Explored). To use, 
plug a joy stick into the right hand socket of 
your 2068 and load the self running program. 
Following the instruction page, a black pixel will 
appear 1n the center of the screen. The pixel 
will plot when moved in any one of eight 
directions by pressing the b, n, m, gs t yu 
Keys. With the fire button depressed, the pixel 
will move without plotting and will erase any dark 
pixel that it passes over. When your masterpiece 

iis finished, BREAK and save "screens". Patterns 
may be placed on clear plastic and traced using 
this program. Clear acetate sheets and lumo-color 


pens are available at the MD Book Exchange. Have 
fun. 


c mia 
7 FRINT ere chon SCREEN D 
Бап PEOQGRARMS o: The keus, TYUG 
SENI contio. tne direction of th 
Е руе КУ Же TTS "AT 12,18," т 
TU" AT 123.10;"6 Jj" RT 14,18; "BHH 
1С FRINT AT zO,S5;"Press Any Ke 
ы TG Continue" 
12 PRINT AT 16,3 Firé button 
igz.g!tucns on the erase cursor" 
15 FRUSE д CLs 
20 LET х=127 
SO LET y=87 
ЗЕ LET хо=х: LET чо=ч 
SS IF STICK (2,2)z0 THEN PLOT 
thd 
SO IF IHHEYS$::'"" THEN GO TO Sa 
eO IF IMKEv£z"" THEN GO TO БШ 
70 LET CŞ=INKEY $ 
Seg LET xz:tiCcSz"u")e(cgz" Md: 
CEZ"m'"i-icgSz"t'"i-icgz"g" =" 
S&L ud 't”")+(C$='u +Û 
Е 6 (c£z"n'")-ics$z'm 
100 LET Si.-ix«di 
ilc LE SI + i4 Qi 
ZE IF =1 THEN GO TO 
158 
136 20 
269 
TES FI TIME 
.189 c3 i 
7292 zu LINE а 


THIS COULD EE YOUR 
AD 


IN THE NEXT ISSUE 
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"MOVING MARQUEE DISPLAY - 


18 REM KON nE MRROL io DISPLAY 
BY VALLIN SDECS2 
20 SOTO 3o" 


30 FOR Msn TO C x 

40 PRINT AT 54E, A; AgiM): Ta Es 
E+D); AT В+Е+8.ЕғЕ +0; E3 iC) AT бё 
+С, AS (D-M) iB TO i AT Psel-A. n. FE 
$ (D-M) RT BE+8,B М: TO Е+Е+В) 

50 ГЕТ M*$=H$ (6 TO 1445181 

ЕХТ H 


70 00 BCE 


| ed 

H 

© 

r 

m 
444 
AMOD mur 


19,7; 'ENTER ñ MERS Š 


180 INPUT Ms : 
170 IF LEN,M$:30 THEN LET MszhHs$ 


“ELEN MS+A TO 31: 
180 LET MSzM$s^ : 
190 CLs 
CAMILLE M 
210 LET ñ$. B) =A§ (A) (30) 4&8 (81 | 


228 LET A$i3)sA$(B) i2Q) +A E! | 


220 L 


рат 0 


z$ (B) 


29 
230 PRINT AT 10,M; ASIA, 
230 NEXT M 
зод PRINT AT .11,29,;B$iB) 
310 FOR Men TO 2 А 
320 PRINT АТ 12,30-м;я$:3,31-м){ 
330 NEXT H 
340 PRINT RT, 11, 2 Б 8: 
250 FOR M=sA 
S60 PRINT RT. 11, м+а; MS iM) 


xA PROGRAMMING HINTS 
2268 

It if Possible to change the 
БЕРЕС fF the ink Color Without 
cCiearina the screen. Te do this 
tame уп the Following 


hen When YOU Want to change the 
per coiof, ture: 


++ 


PRINT HT 2.0; OVER 1; PAFER 


and now the PAPER and INE Will 
change Fight before your EYES. 
The PREFER and INK coolers can be 
chenges to Whatever "cu want. 


From С.А.Т. 5. 6-8 


:- Ager rut 


en 
x; 

QN qi 
V 


address 2615, 


address 2622, 


CLS calls. 


ss24$2229 USR 25892 
TYPE THIS 

SELF IM (iN INPUT 
OUT OF 


RLLOUS 
INK CO 


TS1000 
2K D-FILE PAD OUT 


by George White 


Uncle Clive came up with a clever way 
to save menory in the tiny TS machines; 
the display file is collapsed if RAMTOP 
Almost 
8Q0 bytes may be put to other uses uhen 
there are no characters in tho display. 
But this creates a problem if you writo 
machine codo programa that fit both the 


indicates an unexpanded memory. 


2K and the memory enhanced machines. 


The easiest way to present characters 
in MC, is to poke then into the display 
Of course this requires that the 
display file of the 2K TS1000 match the 
This is 
sometimes called PADDING OUT the D-file 
of the smaller Timex Sinclair but is in 
fact accomplished by using the samo CLS 


file, 


D-file of an expanded machine, 


routine for both computers. 


The CLS routine starts at 2602 in RON 
and checks RAMTOP for 3.5K of memory at 
If RAMTOP shows oxpanded 
memory CLS continuos at 2622. 

The sixtoen byte MC sub-routine shown 
in listing 1, duplicates the first part 
of the CLS routine, avoids the check of 
RAMTOP, ani completes CLS by jumping to 
In this way a 2K machine 
‚ can be made to have a full display file 

and react like a bigger machine. 

Memory is no longer conserved so only 
short programa may be written, and alas 
this schomo can not work with a 1K 2X81 
without modifications. 


Once D-file is established the screen 


may bo closred with this routine or the 


routine in listing 2, but not by normal 
Both listings are read left 
to right, top to bottom, and may be put 


any whore in memory in decimal form. 


$£2232222322223 
IF YOU FIND YOUR- 


YOU CRN'T GET 


IN 


s 
a3883 و ا‎ эзет 


z33 PRIN 

; 6; AS 33233224 
YOU TO CHANGE PAPER AND 
LOR UITHOUT CLEARING 


$5223 PRINT 81; 
$2822 PRINT 81; 
322223 PRUSE 424 
PRINTS OH LINES 


*3 


Listing 1 
6 24 253 203 
1 142 14 33 
197 205 24 9 
193 195 62 10 


MC CLS with PAD OUT 


* 
= 
* 


* *oG 
Listing 2 
¿2 12 6¿ 35 
175 14 24 6 
32 119 35 16 
252 35 13 32 
246 201 
MC quick CLS big D-FILE 
(18 bytes) 


LITTLE GOODIES 
FOR THE 2068 


by George Mockridge 


Ine 
we will add it to the list. 


232222 POKE 23609,2100 сезерге 
BEEP UMEN ANY KEY PRESSED. 


#22222 POKE 23692,255 222252225225 
ОЗЕ e EUERY PRINT TO DEFERT 
s . 


2232224 POKE 23658,8 2228828238822 
PUT 2066.IN CAPS MODE. 


22242244 POKE 23658,0 s22222222522 
TAKE 2068 OUT OF CAPS NODE. 


2342444 PAUSE 4E4 #8332484242 
PAUSE UNTIL ANY KEY PRESSED. 
222 POKE 23561,8 (8=1 TO 35) #84 
TIME THAT A KEY MUST BE LD 
DOUM BEFORE IT REPEATS. PREFER 
19-15 FOR TEXT. 


233 POKE 23562,8 (8:1 TO 5) sse£ 
DELAY BETUEEN SUCCESSIVE REPEATS 
oun KEY HELD DOUN. PREFER 3 FOR 
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BASIC WITH STYLE 
For the Experienced 
Basic Program mer 


This colu mn Is for the reader who already 
programs in Basic, and 15 ready to improve his 
skilis and become a better program mer, 

Have you ever written a FOR NEXT loop 
which ran too darn slow? The first thing you do 
is make sure you don't have any statements 
Inside the loop which don't have to be inside the 
loop. But what If it's stiil too slow? This 
article concerns a method of speeding up 
FOR/NEXT loops and GOTO and GOSUB. 

First, here is something for you to try: 
Load a long program, the longer the better. 
Then, enter the following code; It doesn't 
matter If you're over-writing the program you 

Just loaded from tape, 


3900 FOR маі TO 50 
9910 NEXT N 
ээга STO 
Now Put your machine in SLOW mode and 
run this loop (RUN 9900) and time it— get a 
clock and count seconds from the moment you 
hit ENTER after RUN 9900 until the report 
code 9/9920 appears on the screen. 
Now enter the same code а? iine 10 like 
this: 


10 FOR N=1 TO SO 
20 NEXT N 
За STOP 


Run that loop and time It. 

Surprise! it runs faster at the lower line 
number, A lot faster. In my test, ! got 15 
seconds versus 2 seconds. 


Well, let's try another experiment. This 


Make sure the machine Is In slow mode, 
then RUN 9910 and time It. 


| got 6 seconds, Now try ttiis: 


a 
8 
o 
O 
(А 
c 
Uu 
PPPPPPBPP 


When! RUN I get less than 1 second, So 
nine GOSUB's and RETUR N's take 6 seconds at 
the end of a 16K program anc less than ! second 
at the beginning, The same thing happens with 
бото. 

Why? Apparently, when the Sinclair wants 
to find a line number, it starts at the beginning 
of the program and looks at each line nu mber in 
order until It finds the one It's looking for. 

So If your FOR/NEXT loop at line number 
5500 runs too siow, put it near the beginning of 
the program. Likewise, If а particular section 
of your code has a lot of GOT O's you might 
want to meke that section a sub-routine, and 
put It near the beginning of the program. 


Program Line Organization 
All of this suggests a different organization 


of program lines than one might otherwise use. 
Here is the system ! use. 


Line Number Contents 
0-99 Machine Code Routines 


and begin statement 


100-999 FOR/NEXT loops 
1000-7999 Sub-routines 
8000-9499 Main Program 
9500-9999 Utitittes 


The machine code routines are contained in 
REM statements, The first | пе after those 
REM statements is a begin statement (GOTO 
8000), so the user can start the program simply 
by entering RUN or GOTO 1, 

| leave so much room for sub-routinos 
because my main program Is usually oniy 20 
"Ines or so. More about that In the next solu тп, 

Last of all, the utilities зге those routines 
which help you write the program, but aren't 
actually part of the program. An example Is 
the "Bytes Remaining" utility listed elsewhere 
In this newsletter, 


GLEANINGS 


stolen from the Timex Survivors Flyer 


01096 


defeieieiototeieieieinieihnicieieieioioieieieinieieicioteiotetok 
ist * 2nd Displays 
eieicicieieieinieieieinieieteieieieioinietieieieietetelole dede koi 
You can use this routine to move 
the Function Dispatcher so you 
Can utilize the 2nd Dispatcher. 


` 40 CLEAR 39999 


20 FOR i=40000 to 40017 

30 READ n:POKEi,n 

40 NEXT i 

$0 DATA 1,254,254,205,153,100,62, 
2,205,142,14,1,255,0,205,89, 
252,201 


After the ist use, you then have 
to use these commands~otherwi se 
you will BOMB OUT. 


OUT 255,2 for the 2nd Display 
OUT 255,0 for the ist Display 


jricieietoieteieoiieiomieieieioieieicicieieiodeie detected 
22nd *23rd Display Lines 


If you would like to use the 
22nd + 23rd lines on the screen 
without using the INPUT COMMAND, 
use this Command 


PRINT @1;AT 0,2;"Hi there!!* 
PRINT @!; AT 1,5;°Bye Now! ! ° 


The computer will continue to 
process the program,which is 
fine unless you have to put a 
question or a prompt and are 
waiting for a response. 


In which case you would have to 
Put in a loop so that until you 
got your needed answer the 
program would not continue. 


Joietoietetdomieieteinteietoieieicicieininieinicieietofefiedioit 
Just for FUN try this 


01 CLS 

05 INK 0: ON ERR GO TO 1 

10 INPUT INKO;°Enter Number*;n 
15 IF n«210 THEN GO TO 10 

17 IF n>800 THEN GO TO 10 

20 INPUT INKO; "Enter Ink*;i 

25 IF i «0 THEN GO TO 20 

30 IF i )? THEN GO TO 20 

33 CLS 

40 INK i; PLOT 75,85: ОКАН 50,50. 


on 

42 REM 50,50 can be changed to 
23,25 

43 PRINT $1; АТ 0,0;°PRESS 2 for 
Copy to PRINTER* 

45 PRINT $1; АТ 0,0;°Press any 
other key to continue’ 

46 IF INKEY$2s** THEM GO TO 46 

49 IF INKEY$2*Z* THEM COPY 1 
LPRINT *Number* ;nÀ:L PRINT : 
LPRINT 

30 GO TO 10 


ate Р.О. Box 575, 2 South Street, Williamsburg, MA 


PRAIA AAR RAR ARRAS IAA trite 
SCROLLING 

tek 
If you POKE a number from i tc 
255 into the location 23692,trte 
computer will scroll that many 
lines plus 21 (IF THERE IS THAT 
MUCH TEXT TO BE SCROLLED) 


Otherwise it will return to the 
beginning of the text and use 
hat to priat the number of 
li.es you estimated. 


POKE 23692,9 
@=Any number from 1 to 255 


Tet itt Rt a dick dose iode sedeo A kk irik 
Faster Control 

ылыы REALE EAE ыы kk 

If you -have a long text to edit 

and you feel like your computer 

is worn out before it starts,-OR 

if your laser guns aren't firing 

fast enough for you,--Try these 

commands BUT BEWARE!!! 

ал ыыы ыыы ыы ыыы ыыы IA BADR. SACK 

РОКЕ 23561,9 (9 = 1 TO 35) 

(1 prefer 10 to 15 for Text) 


POKE 23562,9 (9 = 1 to 5) 
(1 prefer 3 for Text) 


For the touch typist this is 
really a terrific advantage. 
PBIB AAAI AIPA iriri SAA AIBA AAA IA. 
POKE 23561,9 (Ф = 1 to 35) 

(1 prefer 1 to 10 for Games) 


POKE 23562,9 (® = 1 to 5) 
(1 prefer 1 for Games) 


PRPS ARABIA IRR ыыы AK СА 
BEEP for TYPING 

KAITAIA Ari A BAIA I. 

For those of you who are Hard 

of Hearing cr just like to hear 

the reassuring beep of the type- 

writer keys, Try this Command: 


POKE 23609,9 (® = 1 to 255) 


The sounds range from wood 
blocks to Morse Code. 


0 being no sound. 


К т ыл ыыы ыы ыы ыы ыыы: 
MORE FLAGS 

PDR IARI IAAI AADAC fefe 

For these of you that do some 

business programming where you 

would like to capitalize 


occasionally, here is POKE for 
youl! 
POKE 23658,8 (CAPITALS) 


‚0 (Lower case) 


PROGRAMMING TIPS 


Here is a cute routine 
gour friends. 


PLOT 66.25 : DRAN 133,1309. 4102 


Did you know that you can W 
DRAW command with а Padi 
variable? 


ЕЗ rer er eee ee сыз аз че ыз “m ыз 9121723222 < 
SS rr F 


Hera is another cute caulina 
from Dale Barnard. 


This next routine some oF ED 
mau have seen in one of mu 
Catalogs. It Lowers RAMTOFP 
Places a handwritten char: 

bove it. Other TS wus: 
talked to have 
bove RAMTOP Like 
r3, Foreign Lan 
e contral уа 
the computer un 
norma і charac? 
t Location 236 

POKING in a 
ese two чаг 

the comput 

t. 
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RERCO-TASWORD тый PATCH 


IF uou would Lika to use TREBORD 
THE (Тї) Weed Processor with 
your ВЕРСО Interface, ou myst 
Боке in this patch First. 

POKE 579993., 127 

POJKE 56902.i92 

POKE SS8003,.127 

POKE 58914.2153 

POKE 58915.1127 

We thank the s2ople at AERCO 
for this Correction. 
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TS 2959 MODEMS +5 Power Strife 
We hear from our customers that 
they hav8 a prablem Loading the 
Software tapa that comas Lin 
the Westriase TS 2965 mogem. zi 
YOu ага using a Power Strip. 
точе your річс оп the  racoraer 
to another ougtiet and it  zhauLd 
work. Does anybody wan t. to 
comment on that? 


Era T.$.9. News letter 
10-4 


A SHORT. UTILITY amar 


ES TE A, 


A utility is a program which heips you 
write other programs. 

This utitity lets you know how much empty 
space remains in your memory. 

1 enter It at 9900 so if won't Interfere: with 
the program I'm writing, Whon | fhink | may be 
close to running out of memory | "GOTO 9900", 
and! see how many bytes | have left, 

The number displayed is actually nor 
exactly correct, but It's very close. 


$900 PRINT PEEK I8S56+256eFPEEK | 
8387-PEEK 16412-256+РЕЕК 16412; 
BYTES REMAIN" c4 “ Frieudly 


Vol £ t) 


HHR 


1 REM LOTTO BY MYRON CRISUE.L 
5 LET T$-"ABCDEFGHIJ" 
10 FOR J-i TO 10 
20 DIM Ti5:. 
38 DIM Aidi — 
40 FOR x=1 Tü 5 А 
SQ LET B=INT iRNDs3941.5! 
80 LET AiB?! =E 
Pu 70 NEXT X 
М 38 EEA 1 ro e 
° SB Bel TO 40 
N 189 ТЕ Alai=@ THEN G2 TO 120 
Эм 110 LET TIX? =5 1:8)? 
120 LET x=x+1 
130 NEXT B "E 
149 IF TIS! =3 THEN GO ТО 20 
4 145 PRINT Т& ; 
E 150 FOR х=1 TO 6 | 
А 150 PRINT TAB STi! 
< 270 NEXT x 
ә 180 PRINT 
135 PRINT 
180 NEXT 4 
3 209 сару 
° 210 STOP 
£ 3980 CLEAR 
3881 SALE “LOTTO 
3333 RUN 
STARRE OM PE NER EDE SE PE EEEE BEETS اا‎ 
A 3 4 Аз 1:2 22 ad 
B 1i 17 21 24 32 32 
c a 12 i8 22 3e 25 
Ë 3 23 24 25 з= z= 
= 2 3 18 27 35 ze 
= = te is 23 25 = = 
z 3 + 43 24 23 1: 
- т £ 22 26 35 s = 
= 2 io is 13 z+ 35 
, т з is 21 25 31 
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Number Master “do 

By Charlie Day 

This game is very much like 
MASTERMIND, except you use numbers 
instead of colors. ‘fou have ten 
guesses to guess the number. ‘fou 
enter a four digit number tor each 
guess which is your guess what the 


number is. A '1* will appear in the 


. postions of the numbers that are in 


the correct postion. An inverse ' і ' 


will appear if a number is the 
&ctual number, but not in tthe 
correct place. А "O" will appear is 
the position if the number is not 
the correct number. The game is 
very simple and car easly be 
modifyed. I¢ you want to make the 
game harder you саһ change the 
number "4* in line 140 to a “number 


reator than 4. This is one program 
hat you can really play with, so 


go ahead, don't be shy. 


REM MASTER NUMBEF FOR Т/$ 
1000-BY CHARLIE LAY 


195 PRINT TAB 10; *NUFNBER MASTER 
110 LET Ава» = 
120 RAND 
130 FOR I=i TO 4 


LET A=(INT (RND34*1)) 
LET AS*AS«STRS А 
NEXT I 
FOR I=1 TO 10 
PRINT 
PRINT *GUESS NUMEER “$I 
DIM N14) 
INPUT Bs 
PRINT Ве 
IF В®=А® THEN GO TO 320 
FOR J=1 TO 4 
IF AS$(J TO J)2B$(J TO J) TH 
ЕМ LET N(J)»1 
220 IF AS(J TO 3) =Ва‹ј TO J) TH 
EN GO TO 260 
230 FOR Ка; TO 
240 IF Bais TO 
EM LET Nt3)»2 
250 NEXT K 
260 NEXT J 
270 FOR Ks10 TO 13 
280 IF N(K-9)»1 THEN PRINT ;"1* 


$ 

290 IF N(K-9)»2 THEN PRINT 3"Cuse 
an inverse 1 herel’; 

295 IF N(K-9)=O THEN PRINT ;°0° 


NEXT K 
NEXT I 
90 TO 330 
PRINT 
PRINT “CORRECT IN °315° GUE 
PRINT AT 20,13"Cuse inverse 
characersJ] PRESS ANY KEY TO PLAY 
AGAIN* 
340 PRINT AT 20, 1; "РКЕЅЗ ANY KE 
Y TO PLAY AGAIN* 
350 IF INKEYGe** THEN GO TO 330 
360 RUN 


4 
J)!-AS(K TO K) TH 
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